home *** CD-ROM | disk | FTP | other *** search
/ Graphics Plus / Graphics Plus.iso / msdos / fractal / iterat31 / horshoe2.frm < prev    next >
Encoding:
Text File  |  1993-09-30  |  283 b   |  23 lines
  1. ;Iterate function file
  2. ;by Brent Hugh
  3.  
  4. ;Window defaults 
  5. xmin=0      
  6. xmax=1
  7. ymin=0      
  8. ymax=1.1 
  9.  
  10. ;Parameter defaults
  11. a=.1  
  12. b=.9 
  13. c=2 
  14. d=1
  15. mu=.5
  16.  
  17. ;the function
  18. y=(1-sqr(c*y-d))*(a*x+b)
  19. x=x*(c*y-d)/2+.5
  20.  
  21. ;a horseshoe map 
  22. ;works only in range 0<x<1, 0<y<1 
  23.